	TOP
	PARAMETER KNL=+013
	PARAMETER KLF=+010
	BYTE XX
	BYTE AA
	BYTE BB
	BYTE CC
	BYTE DD
	BYTE EE
	BYTE NL
	BYTE LF
 BEGINMAIN(AC,IAV)
 NL=+KNL
 LF=+KLF
 MS 'BEGIN T02'
 AA=+001
 BB=+002
 XX=AA==BB
 IF XX
	MS '==FAILS!='
	MS 'OR IF OR '
	MS 'DEFINITIN'
	GOSUB CR
 ELSE
	MS '111111111'
 ENDIF
 BB=+001
 XX=AA==BB
 IF XX
	MS '222222222'
 ELSE
	MS '==FAILS=='
 ENDIF
 XX=AA!=BB
 IF XX
	MS '!=FAILS=='
 ENDIF
 MS '333333333'
 BB=+005
 XX=AA!=BB
 IF XX
 ELSE
	MS '!=FAILS!='
 ENDIF
 MS '444444444'
 BB=+001
 XX=AA<!BB
 IF XX
	MS '<!FAILS=='
 ENDIF
 MS '555555555'
 BB=+002
 XX=BB<!AA
 IF XX
	MS '<!FAILS>!'
 ENDIF
 MS '666666666'
 XX=AA<!BB
 IF XX
 ELSE
	MS '<!FAILS<!'
 ENDIF
 MS '777777777'
 XX=BB<=AA
 IF XX
	MS '<=FAILS>!'
 ENDIF
 GOSUB CR
 MS '888888888'
 BB=+002
 XX=AA<=BB
 IF XX
 ELSE
	MS '<=FAILS=='
 ENDIF
 MS '000000000'
 AA++
 XX=AA!=BB
 IF XX
	MS '++FAILS..'
 ENDIF
 MS 'AAAAAAAAA'
 AA++
 AA--
 XX=AA!=BB
 IF XX
	MS '--FAILS..'
 ENDIF
 MS 'BBBBBBBBB'
 AA=+050
 BB=+064
 DD=AA+BB
 EE=+114
 XX=DD!=EE
 IF XX
	MS 'ADD...+++'
 ENDIF
 MS 'CCCCCCCCC'
 CC=+000
 BB=+050
 DD=BB-AA
 AA=+000
 XX=AA!=DD
 IF XX
	MS 'SUB...+-+'
 ENDIF
 MS 'DDDDDDDDD'
 AA=+000
 BB=+050
 CC=AA-BB
 BB=+064
 DD=AA-BB
 BB=+114
 EE=AA-BB
 BB=CC+DD
 XX=BB!=EE
 IF XX
	MS 'ADD...-+-'
 ENDIF
 MS 'EEEEEEEEE'
 BB=CC-DD
 EE=+014
 XX=EE!=BB
 IF XX
	MS 'SUB---=>+'
 ENDIF
 MS 'FFFFFFFFF'
 BB=DD-CC
 AA=+000
 CC=AA-EE
 XX=BB!=CC
 IF XX
	MS 'SUB---=>-'
 ENDIF
 MS 'GGGGGGGGG'
 AA=+001
 BB=+003
 AA=AA+BB
 CC=+004
 XX=CC!=AA
 IF XX
	MS 'ADD.X=X+.'
 ENDIF
 GOSUB CR
 MS 'HHHHHHHHH'
 BB=AA+BB
 CC=+007
 XX=CC!=BB
 IF XX
	MS 'ADD.X=.+X'
 ENDIF
 MS 'IIIIIIIII'
 CC=CC+CC
 BB=+014
 XX=BB!=CC
 IF XX
	MS 'ADD.X=X+X'
 ENDIF
 MS 'JJJJJJJJJ'
 AA=+009
 BB=+005
 AA=AA-BB
 CC=+004
 XX=CC!=AA
 IF XX
	MS 'SUB.X=X-.'
 ENDIF
 MS 'KKKKKKKKK'
 AA=+009
 BB=AA-BB
 XX=CC!=BB
 IF XX
	MS 'SUB.X=.-X'
 ENDIF
 MS 'LLLLLLLLL'
 AA=AA-AA
 BB=+000
 XX=AA!=BB
 IF XX
	MS 'SUB.X=X-X'
 ENDIF
 ENDMAIN
 SUB CR
	WRITE NL
	WRITE LF
 ENDSUB
 BOTTOM
 FINIS
